home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
QRZ! Ham Radio 8
/
QRZ Ham Radio Callsign Database - Volume 8.iso
/
pc
/
files
/
mac
/
chess_hc.hqx
/
Chess Stack1.0
/
ChessStack V1.0
/
card_6290.txt
< prev
next >
Wrap
Text File
|
1988-06-28
|
21KB
|
1,058 lines
-- card: 6290 from stack: in.0
-- bmap block id: 6728
-- flags: 4000
-- background id: 2581
-- name: Main
----- HyperTalk script -----
on enterKey
put empty into card field "outField"
end enterKey
on arrowKey
put empty into card field "inField"
end arrowKey
on openCard
global communicationsMode
if communicationsMode is "Packet" then
hide card button "Dial"
hide card button "Hang"
show card button "Cmd:"
show card button "Conn"
hide card button "Disc"
else if communicationsMode is "Modem" then
show card button "Dial"
show card button "Hang"
hide card button "Cmd:"
hide card button "Conn"
hide card button "Disc"
end if
end openCard
-- part 3 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=299 top=299 right=334 bottom=334
-- title width / last selected line: 0
-- icon id / first selected line: 16145 / 16145
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: White King
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 4 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=256 top=299 right=334 bottom=292
-- title width / last selected line: 0
-- icon id / first selected line: 27947 / 27947
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: White Queen
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 5 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=215 top=299 right=334 bottom=249
-- title width / last selected line: 0
-- icon id / first selected line: 30724 / 30724
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: White Bishop1
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 6 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=175 top=298 right=334 bottom=206
-- title width / last selected line: 0
-- icon id / first selected line: 4614 / 4614
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: White Knight1
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 7 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=136 top=258 right=291 bottom=160
-- title width / last selected line: 0
-- icon id / first selected line: 23927 / 23927
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: White Pawn1
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 8 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=135 top=299 right=333 bottom=162
-- title width / last selected line: 0
-- icon id / first selected line: 30036 / 30036
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: White Rook1
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 9 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=299 top=5 right=40 bottom=334
-- title width / last selected line: 0
-- icon id / first selected line: 16113 / 16113
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Black King
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 10 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=258 top=5 right=40 bottom=291
-- title width / last selected line: 0
-- icon id / first selected line: 14 / 14
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Black Queen
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 11 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=214 top=5 right=40 bottom=250
-- title width / last selected line: 0
-- icon id / first selected line: 11762 / 11762
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Black Bishop1
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 12 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=175 top=4 right=40 bottom=206
-- title width / last selected line: 0
-- icon id / first selected line: 2548 / 2548
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Black Knight1
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 13 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=135 top=6 right=39 bottom=162
-- title width / last selected line: 0
-- icon id / first selected line: 484 / 484
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Black Rook1
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 14 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=136 top=48 right=81 bottom=160
-- title width / last selected line: 0
-- icon id / first selected line: 9813 / 9813
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Black Pawn1
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 16 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=178 top=258 right=291 bottom=202
-- title width / last selected line: 0
-- icon id / first selected line: 23927 / 23927
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: White Pawn2
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 17 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=220 top=258 right=291 bottom=244
-- title width / last selected line: 0
-- icon id / first selected line: 23927 / 23927
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: White Pawn3
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 18 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=262 top=258 right=291 bottom=286
-- title width / last selected line: 0
-- icon id / first selected line: 23927 / 23927
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: White Pawn4
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 19 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=304 top=258 right=291 bottom=328
-- title width / last selected line: 0
-- icon id / first selected line: 23927 / 23927
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: White Pawn5
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 20 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=346 top=258 right=291 bottom=370
-- title width / last selected line: 0
-- icon id / first selected line: 23927 / 23927
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: White Pawn6
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 21 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=388 top=258 right=291 bottom=412
-- title width / last selected line: 0
-- icon id / first selected line: 23927 / 23927
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: White Pawn7
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 22 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=430 top=258 right=291 bottom=454
-- title width / last selected line: 0
-- icon id / first selected line: 23927 / 23927
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: White Pawn8
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 23 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=178 top=48 right=81 bottom=202
-- title width / last selected line: 0
-- icon id / first selected line: 9813 / 9813
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Black Pawn2
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 24 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=220 top=48 right=81 bottom=244
-- title width / last selected line: 0
-- icon id / first selected line: 9813 / 9813
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Black Pawn3
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 25 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=262 top=48 right=81 bottom=286
-- title width / last selected line: 0
-- icon id / first selected line: 9813 / 9813
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Black Pawn4
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 26 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=304 top=48 right=81 bottom=328
-- title width / last selected line: 0
-- icon id / first selected line: 9813 / 9813
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Black Pawn5
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 27 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=346 top=48 right=81 bottom=370
-- title width / last selected line: 0
-- icon id / first selected line: 9813 / 9813
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Black Pawn6
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 28 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=388 top=48 right=81 bottom=412
-- title width / last selected line: 0
-- icon id / first selected line: 9813 / 9813
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Black Pawn7
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 29 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=430 top=48 right=81 bottom=454
-- title width / last selected line: 0
-- icon id / first selected line: 9813 / 9813
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Black Pawn8
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 30 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=429 top=299 right=333 bottom=456
-- title width / last selected line: 0
-- icon id / first selected line: 30036 / 30036
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: White Rook2
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 31 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=341 top=299 right=334 bottom=375
-- title width / last selected line: 0
-- icon id / first selected line: 30724 / 30724
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: White Bishop2
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 32 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=385 top=298 right=334 bottom=416
-- title width / last selected line: 0
-- icon id / first selected line: 4614 / 4614
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: White Knight2
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 33 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=429 top=6 right=39 bottom=456
-- title width / last selected line: 0
-- icon id / first selected line: 484 / 484
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Black Rook2
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 34 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=340 top=5 right=40 bottom=376
-- title width / last selected line: 0
-- icon id / first selected line: 11762 / 11762
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Black Bishop2
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 35 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=385 top=4 right=40 bottom=416
-- title width / last selected line: 0
-- icon id / first selected line: 2548 / 2548
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Black Knight2
----- HyperTalk script -----
on mouseDown
repeat while the mouse is down
set the loc of the target to the mouseloc
end repeat
end mouseDown
on mouseUp
centerPiece
end mouseup
-- part 43 (button)
-- low flags: 80
-- high flags: A002
-- rect: left=472 top=25 right=46 bottom=509
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Dial
----- HyperTalk script -----
on mouseUp
put "Dialing..." into field "Game Info"
sendSPort 1,false,"ATDT" & (card field "PhoneNumber" of card "Options") & return
wait 1 seconds
put empty into field "Game Info"
end mouseUp
-- part 44 (field)
-- low flags: 00
-- high flags: 4007
-- rect: left=4 top=62 right=160 bottom=122
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 0
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: inField
-- part 45 (field)
-- low flags: 00
-- high flags: 0002
-- rect: left=4 top=179 right=245 bottom=122
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 0
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: outField
-- part 46 (button)
-- low flags: 00
-- high flags: A002
-- rect: left=470 top=203 right=222 bottom=507
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Cmd:
----- HyperTalk script -----
on mouseUp
global cC1,communicationsMode
put "Sending..." into field "Game Info"
if communicationsMode is "Packet" then
sendSPort 1,false,cC1 & card field "outField" & return
else
sendSPort 1,false,card field "outField" & return
end if
wait 1 seconds
put empty into field "Game Info"
end mouseUp
-- part 51 (button)
-- low flags: 80
-- high flags: A002
-- rect: left=472 top=72 right=92 bottom=509
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Hang
----- HyperTalk script -----
on mouseUp
put "Hanging Up" into field "Game Info"
wait 1 seconds
sendSPort 1,false,"+++"
wait 2 seconds
sendSPort 1,false,"ATH" & return
wait 2 seconds
sendSPort 1,false,"ATZ" & return
put empty into field "Game Info"
end mouseUp
-- part 52 (button)
-- low flags: 00
-- high flags: A002
-- rect: left=472 top=121 right=140 bottom=509
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Conn
----- HyperTalk script -----
on mouseUp
global cntlC3,cC1
put "Connecting..." into field "Game Info"
put card field "TncbaudRate" of card "Options" into theBRate
setBaud theBRate
put card field "hamID" of card "Options" into theHamID
sendSPort 1,false,cC1 & return
sendSPort 1,false,"ECHO OFF" & return
sendSPort 1,false,"CONNECT" && theHamID & return
-- sendSPort 1,false,"CONVERSE" & return
end mouseUp
-- part 55 (button)
-- low flags: 80
-- high flags: A002
-- rect: left=472 top=144 right=163 bottom=509
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Disc
----- HyperTalk script -----
on mouseUp
global cntlC3,cC1
put "Disconnect..." into field "Game Info"
sendSPort 1,false,cC1 & "DISCONNE" & return
sendSPort 1,false,"ECHO ON" & return
end mouseUp
-- part 57 (button)
-- low flags: 00
-- high flags: A002
-- rect: left=471 top=160 right=179 bottom=508
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Msg
----- HyperTalk script -----
on mouseUp
put "Msg..." into field "Game Info"
sendSPort 1,false,"Msg" && card field "outField" & return
wait 1 seconds
put empty into field "Game Info"
end mouseUp
-- part 59 (button)
-- low flags: 00
-- high flags: A000
-- rect: left=468 top=251 right=294 bottom=509
-- title width / last selected line: 0
-- icon id / first selected line: 2507 / 2507
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Help
----- HyperTalk script -----
on mouseUp
visual effect dissolve
go to card "Help Index"
end mouseUp
-- part 63 (button)
-- low flags: 00
-- high flags: A002
-- rect: left=470 top=183 right=198 bottom=508
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Set
----- HyperTalk script -----
on mouseUp
visual effect iris open
push card
go to card "Options"
end mouseUp
-- part contents for background part 67
----- text -----
Packet Chess V1.0
-- part contents for background part 75
----- text -----
White
-- part contents for background part 74
----- text -----
Black